aa aa ab aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa 
aa ab ac ab aa ad ab ae aa af ab ab aa ab ab ab aa ab ab ab aa ag ab ab aa ab ah ai aa ab aj ab aa ak al am aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa an ab ab aa ao ab ab aa ap ab aq aa ar ab ab aa ab ab ab aa as ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa at ab ab aa au ab ab ab aa 
aa av ab aw aa ax ab ay aa az ab aA aa aB ab ab aa aC ab ab aa aD ab aE aa ab ab ab aa ab ab ab aa ab ab ab aa aF ab ab aa aG ab ab aa aH ab ab ab aa 
aa aa aI aa aJ aa aK aa aL aa aM aa aa aa aN aa aa aa aO aa aa aa aP aa aa aa aQ aa aa aa aR aa aa aa aS aa aa aa aT aa aa aa aU aa aV aa aW aa aa aX 
ab ac ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ac ab 
aa aa aY aa aa aa aZ aa aa aa a0 aa aa aa a1 aa aa aa a2 aa aa aa a3 aa aa aa a4 aa aa aa a5 aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa a6 aa aa aa 
aa a7 ab ab aa ab ab a8 aa a9 ab ba aa bb ab bc aa bd ab be aa bf ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa bg ab ab aa ab ab bh aa bi ab ab aa bj ab ab aa bk ab bl aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa ab ab ab aa ab ab bm aa bn ab ab aa ab ab ab aa ab bo bp aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab bq aa 
aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa br ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa aa bs aa bt aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa bu aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa bv aa ab aa aa aa 
aa ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab aa 
aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa ab aa aa aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab aa ab ab ab ab aa 
aa aa ab aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa 
aa ab ab ab aa ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab aa 
aa ab ab ab aa ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab aa 
aa ab ac ab aa ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab ab aa 
aa aa ab aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa aa 

:def
:aa
pix("underground/rock.png")
walk(0)
:ab
pix("underground/dirt.png")
walk(1)
:ac
pix("underground/dirt.png")
walk(1)
Action
info("Edge of map test. This should stop the player,")
info("but not give any python tracebacks.")
:ad
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Add non-existant skill: this should not crash DH, but should")
info("return a useful message.")
addskill("qwertyuiop")
:ae
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Just for allowing test of addskill command: Attack!")
attack("Ant")
:af
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("attack random from safe map")
set("attack_return", "=", attack("random", "town.txt"))
info("returned: ~attack_return~")
:ag
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
dialog("This is a much longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer longer message")
:ah
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
die()
:ai
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
give("hp", -999)
dialog("This should not display")
:aj
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
end()
info("This should not display")
:ak
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Test non-existant item:")
set("temp_var", "=", find("Doesnt_exist", "a"))
info("Returned ~temp_var~.")
:al
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Test normal item:")
set("temp_var", "=", find("Dagger", "a"))
info("Returned ~temp_var~.")
:am
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Test gold:")
set("temp_var", "=", find("gold", 5))
info("Returned ~temp_var~. Test evil gold:")
set("temp_var", "=", find("gold", -5))
info("Returned ~temp_var~.")
:an
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("A non-existant tile will be added. This will not work,")
info("but should not crash DH. A useful error message would also be good.")
addpix("non_existant_tile")
:ao
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Add scripted skill Cringe")
addskill("Cringe")
:ap
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
addpix("furnishings/green_rug.png")
Action
info("Attack random from level 1.")
set("attack_return", "=", attack("random", "level1.txt"))
info("returned: ~attack_return~")
:aq
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Attack specific non-existant monster")
set("attack_return", "=", attack("non_exist"))
info("returned: ~attack_return~")
:ar
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Test it out:")
attack("Ants")
:as
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
dialog("This is a longerlongerlongerlongerlongerlongerlongerlongerlongerlonger message")
:at
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
give("gold", -999)
give("exp", -99)
:au
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
hero("nonexistant_tile")
:av
pix("underground/dirt.png")
walk(1)
addpix("house_trans.png")
addpix("small_tree_bottom_trans.png")
addpix("furnishings/sink.png")
Action
info("addpix test: should display house, tree bottom, and sink.")
:aw
pix("underground/dirt.png")
walk(1)
addoverpix("town_trans.png")
:ax
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Add Rage skill")
addskill("Rage")
:ay
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
set("test", skill("give", "Cringe"))
info("~test~")
set("test", skill("has", "Cringe"))
info("~test~")
set("test", skill("take", "Cringe"))
info("~test~")
set("test", skill("has", "Cringe"))
info("~test~")
:az
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("attacking existing monster: Ant")
set("attack_return", "=", attack("Ant"))
info("returned: ~attack_return~")
:aA
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("attack random from non-existant map")
set("attack_return", "=", attack("random", "non_exist"))
info("returned: ~attack_return~")
:aB
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Prep: giving Testing_skill")
addskill("Testing_skill")
:aC
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("This should remove the rug")
delpix("furnishings/green_rug.png")
:aD
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
dialog("This is a short message")
:aE
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
dialog("This is a \n newline separated message")
:aF
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
set("tempvar", "=", gamestat("loc"))
info("location is ~tempvar~")
set("tempvar", "=", gamestat("difficulty"))
info("difficulty is ~tempvar~")
set("tempvar", "=", gamestat("gamename"))
info("Game name is ~tempvar~")
set("tempvarx", "=", gamestat("x"))
set("tempvary", "=", gamestat("y"))
info("XY coords are ~tempvarx~, ~tempvary~")
set("tempvar", "=", gamestat("mapname"))
info("Mapname is ~tempvar~")
:aG
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
addpix("furnishings/green_rug.png")
Action
give("maxhp", -999)
give("maxep", 99999)
give("name", "Frank the Weasel")
:aH
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
hero("man_s")
:aI
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for addpix, and out-of-bounds areas to the north.")
:aJ
pix("underground/rock_exit.png")
walk(1)
Action
move("test_map.txt", 4, 15)
:aK
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for addskill")
:aL
pix("underground/desert_exit.png")
walk(1)
Action
move("testing.txt", 6, 6)
:aM
pix("underground/dirt.png")
walk(1)
Action
info("Testing area of attack command")
:aN
pix("underground/dirt.png")
walk(1)
Action
info("battle scripting testing area")
:aO
pix("underground/dirt.png")
walk(1)
Action
info("Testing area of delpix command")
:aP
pix("underground/dirt.png")
walk(1)
Action
info("Testing area of Dialog command")
:aQ
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for die command")
:aR
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for end command")
:aS
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for find command")
:aT
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for gamestat")
:aU
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for give")
:aV
pix("underground/rock_exit.png")
walk(1)
Action
move("test_map.txt", 44, 15)
:aW
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for hero")
:aX
pix("underground/rock.png")
walk(0)
Action
info("This should display (check off-by-one errors)")
:aY
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for hurt")
:aZ
pix("underground/dirt.png")
walk(1)
Action
info("testing area for if")
:a0
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for info")
:a1
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for is_equipped")
:a2
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for item/inv")
:a3
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for lose")
:a4
pix("underground/dirt.png")
walk(1)
Action
info("Reserved")
:a5
pix("underground/dirt.png")
walk(1)
Action
info("Reserved for later use")
:a6
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for mapstat")
:a7
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
hurt(5)
:a8
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Broken scripting test")
if(1, "==", 1)
:a9
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Undefined variable: ~undefined_4324455433~")
:ba
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("This is a really really really really really really really really really really really really really really really really really really really really really really really really really really really really really really long line")
:bb
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Non-existant item:")
set("tempvar", "=", is_equipped("non-existant"))
info("~tempvar~")
:bc
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Here, have a dagger:")
item("Dagger")
:bd
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
info("Bad item")
set("tempvar", "=", item("nonexistant"))
info("~tempvar~")
:be
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
inv("give", "Dagger")
info("You should now have a dagger")
:bf
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
lose()
:bg
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
hurt(-6)
:bh
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Broken scripting test")
endif
:bi
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Unmatched ~ character")
:bj
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
set("tempvar", "=", is_equipped("Dagger"))
info("Do you have a dagger equipped? ~tempvar~")
:bk
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
#10
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
#20
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
item("Dagger")
set("tempvar", "=", item("Dagger"))
info("You now have a full inventory and then some")
info("~tempvar~")
:bl
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
set("temp", inv("has", "Dagger"))
info("~temp~")
:bm
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Broken scripting test")
else
:bn
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
info("Show ~~ character")
:bo
pix("underground/dirt.png")
walk(1)
addpix("furnishings/blue_rug.png")
Action
set("temp", inv_spot(0))
info("Loc 0: ~temp~")
set("temp", inv_spot(27))
info("Loc 27: ~temp~")
:bp
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
inv("take", "Dagger")
:bq
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
set("temp", "Hi Mom!")
mapstat("change_titlebar", "~temp~")
:br
pix("underground/dirt.png")
walk(1)
addpix("furnishings/green_rug.png")
Action
set("tempvar", "=", question("This is a question"))
info("you answered ~tempvar~")
set("tempvar", "=", question("This is a \n newline separated question"))
info("you answered ~tempvar~")
:bs
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for move")
:bt
pix("underground/water_exit.png")
walk(1)
Action
move("test_map.txt", 4, 5)
:bu
pix("underground/dirt.png")
walk(1)
Action
info("Testing area for question")
:bv
pix("underground/water_exit.png")
walk(1)
Action
move("test_map.txt", 44, 5)
